home *** CD-ROM | disk | FTP | other *** search
- from PSPApp import *
- import PSPUtils
-
- def ScriptProperties():
- return {
- 'Author': u'Corel Corporation',
- 'Copyright': u'Copyright (c) 2002-2006 Corel Corporation. All rights reserved.',
- 'Description': "As an aid to composition, places guides at the Golden Ratio positions.",
- 'Host': u'Paint Shop Pro 9',
- 'Host Version': u'9.00'
- }
-
- def Do(Environment):
- if PSPUtils.RequireADoc( Environment ) == App.Constants.Boolean.false:
- return
-
- DocWidth = App.TargetDocument.Width
- DocHeight = App.TargetDocument.Height
-
- # HideGuides
- App.Do( Environment, 'ShowGuides', {
- 'ShowGuides': App.Constants.ShowCommands.Hide,
- 'GeneralSettings': {
- 'ExecutionMode': App.Constants.ExecutionMode.Default,
- 'AutoActionMode': App.Constants.AutoActionMode.Match,
- 'Version': ((9,0,0),1)
- }
- })
-
- # AddGuide
- App.Do( Environment, 'AddGuide', {
- 'IsHorizontal': False,
- 'Position': 0.381966 * DocWidth,
- 'GeneralSettings': {
- 'ExecutionMode': App.Constants.ExecutionMode.Silent,
- 'AutoActionMode': App.Constants.AutoActionMode.Match,
- 'Version': ((9,0,0),1)
- }
- })
-
- # AddGuide
- App.Do( Environment, 'AddGuide', {
- 'IsHorizontal': False,
- 'Position': 0.618034 * DocWidth,
- 'GeneralSettings': {
- 'ExecutionMode': App.Constants.ExecutionMode.Silent,
- 'AutoActionMode': App.Constants.AutoActionMode.Match,
- 'Version': ((9,0,0),1)
- }
- })
-
- # AddGuide
- App.Do( Environment, 'AddGuide', {
- 'IsHorizontal': True,
- 'Position': 0.381966 * DocHeight,
- 'GeneralSettings': {
- 'ExecutionMode': App.Constants.ExecutionMode.Silent,
- 'AutoActionMode': App.Constants.AutoActionMode.Match,
- 'Version': ((9,0,0),1)
- }
- })
-
- # AddGuide
- App.Do( Environment, 'AddGuide', {
- 'IsHorizontal': True,
- 'Position': 0.618034 * DocHeight,
- 'GeneralSettings': {
- 'ExecutionMode': App.Constants.ExecutionMode.Silent,
- 'AutoActionMode': App.Constants.AutoActionMode.Match,
- 'Version': ((9,0,0),1)
- }
- })
-
- # ShowGuides
- App.Do( Environment, 'ShowGuides', {
- 'ShowGuides': App.Constants.ShowCommands.Show,
- 'GeneralSettings': {
- 'ExecutionMode': App.Constants.ExecutionMode.Default,
- 'AutoActionMode': App.Constants.AutoActionMode.Match,
- 'Version': ((9,0,0),1)
- }
- })
-
-